@Flag(SpankChoirSafeword) @SystemMessage [Miss A]: You wanted a safeword #ReceptionChat
@Flag(SpankChoirSafeword) @SystemMessage [Miss A]: If you cant handle anymore simply say "Cucumber" #ReceptionChat
@SystemMessage [Miss A]: Take a seat #ReceptionChat
@SystemMessage [Miss A]: You will be summoned in a moment.. #ReceptionChat
(Setup)
@NullResponse @RapidCodeOn @SetVar[StrokesPerRound]=[0] 
@NullResponse @ChangeVar[StrokesPerRound]=[StrokesPerRound]+[AuctionStrokes]
@Variable[AuctionStrokes]>[800] @NullResponse @ChangeVar[StrokesPerRound]=[StrokesPerRound]/[#Random(6,12)]
@Variable[AuctionStrokes]<=[800] @NullResponse @ChangeVar[StrokesPerRound]=[StrokesPerRound]/[#Random(3,8)]
@NullResponse @SetVar[TotalSpanking]=[0] //Total stroke count
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SelectDomme.txt)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\MxIntro.txt)
(Return)
@NullResponse @RapidCodeOn
@NullResponse @CheckFlag(M1R) //
@NullResponse @CheckFlag(M2R) //
@NullResponse @CheckFlag(M3R) //
@NullResponse @CheckFlag(M4R) //
@NullResponse @CheckFlag(M5R) //
@NullResponse @CheckFlag(M6R) //
@NullResponse @CheckFlag(M7R) //
@NullResponse @CheckFlag(M8R) //
**********************************************************************************************************************************************************************
(M1R) // Rating: 8
@NullResponse @NullResponse @If[TotalSpanking]>=[AuctionStrokes]Then(End)
@NullResponse @SetVar[Choice]=[0]
@NullResponse @ChangeVar[Choice]=[Choice]+[#Random(1,100)]
@Flag(SpankChoirFaceSlap) @Variable[Choice]>=[85] @NullResponse @Goto(Slap)
@Variable[Choice]>=[70] @NullResponse @Goto(Corner)
@Variable[Choice]>=[5] @NullResponse @Goto(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SpecialtyM1.txt)
@NullResponse @Goto(Return)
**********************************************************************************************************************************************************************
(M2R) // Rating: 3
@NullResponse @NullResponse @If[TotalSpanking]>=[AuctionStrokes]Then(End)
@NullResponse @SetVar[Choice]=[0]
@NullResponse @ChangeVar[Choice]=[Choice]+[#Random(1,100)]
@Flag(SpankChoirMouthSoap) @Variable[Choice]>=[95] @NullResponse @Goto(Soap)
@Flag(SpankChoirFaceSlap) @Variable[Choice]>=[80] @NullResponse @Goto(Slap)
@Flag(SpankChoirCaning) @Variable[Choice]>=[70] @NullResponse @Goto(Caning)
@Variable[Choice]>=[60] @NullResponse @Goto(Corner)
@Variable[Choice]>=[5] @NullResponse @Goto(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SpecialtyM2.txt)
@NullResponse @Goto(Return)
**********************************************************************************************************************************************************************
(M3R) // Rating: 7
@NullResponse @NullResponse @If[TotalSpanking]>=[AuctionStrokes]Then(End)
@NullResponse @SetVar[Choice]=[0]
@NullResponse @ChangeVar[Choice]=[Choice]+[#Random(1,100)]
@Flag(SpankChoirFaceSlap) @Variable[Choice]>=[80] @NullResponse @Goto(Slap)
@Variable[Choice]>=[70] @NullResponse @Goto(Corner)
@Variable[Choice]>=[5] @NullResponse @Goto(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SpecialtyM3.txt)
@NullResponse @Goto(Return)
**********************************************************************************************************************************************************************
(M4R) // Rating: 2
@NullResponse @NullResponse @If[TotalSpanking]>=[AuctionStrokes]Then(End)
@NullResponse @SetVar[Choice]=[0]
@NullResponse @ChangeVar[Choice]=[Choice]+[#Random(1,100)]
@Flag(SpankChoirMouthSoap) @Variable[Choice]>=[90] @NullResponse @Goto(Soap)
@Flag(SpankChoirFaceSlap) @Variable[Choice]>=[80] @NullResponse @Goto(Slap)
@Flag(SpankChoirCaning) @Variable[Choice]>=[70] @NullResponse @Goto(Caning)
@Variable[Choice]>=[55] @NullResponse @Goto(Corner)
@Variable[Choice]>=[5] @NullResponse @Goto(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SpecialtyM4.txt)
@NullResponse @Goto(Return)
**********************************************************************************************************************************************************************
(M5R) // Rating: 4
@NullResponse @NullResponse @If[TotalSpanking]>=[AuctionStrokes]Then(End)
@NullResponse @SetVar[Choice]=[0]
@NullResponse @ChangeVar[Choice]=[Choice]+[#Random(1,100)]
@Flag(SpankChoirFaceSlap) @Variable[Choice]>=[80] @NullResponse @Goto(Slap)
@Flag(SpankChoirCaning) @Variable[Choice]>=[60] @NullResponse @Goto(Caning)
@Variable[Choice]>=[50] @NullResponse @Goto(Corner)
@Variable[Choice]>=[5] @NullResponse @Goto(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SpecialtyM5.txt)
@NullResponse @Goto(Return)
**********************************************************************************************************************************************************************
(M6R) // Rating: 6
@NullResponse @NullResponse @If[TotalSpanking]>=[AuctionStrokes]Then(End)
@NullResponse @SetVar[Choice]=[0]
@NullResponse @ChangeVar[Choice]=[Choice]+[#Random(1,100)]
@Flag(SpankChoirFaceSlap) @Variable[Choice]>=[75] @NullResponse @Goto(Slap)
@Variable[Choice]>=[65] @NullResponse @Goto(Corner)
@Variable[Choice]>=[5] @NullResponse @Goto(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SpecialtyM6.txt)
@NullResponse @Goto(Return)
**********************************************************************************************************************************************************************
(M7R) // Rating: 5
@NullResponse @NullResponse @If[TotalSpanking]>=[AuctionStrokes]Then(End)
@NullResponse @SetVar[Choice]=[0]
@NullResponse @ChangeVar[Choice]=[Choice]+[#Random(1,100)]
@Flag(SpankChoirFaceSlap) @Variable[Choice]>=[90] @NullResponse @Goto(Slap)
@Flag(SpankChoirCaning) @Variable[Choice]>=[60] @NullResponse @Goto(Caning)
@Variable[Choice]>=[55] @NullResponse @Goto(Corner)
@Variable[Choice]>=[5] @NullResponse @Goto(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SpecialtyM7.txt)
@NullResponse @Goto(Return)
**********************************************************************************************************************************************************************
(M8R) // Rating: 1
@NullResponse @NullResponse @If[TotalSpanking]>=[AuctionStrokes]Then(End)
@NullResponse @SetVar[Choice]=[0]
@NullResponse @ChangeVar[Choice]=[Choice]+[#Random(1,100)]
@Flag(SpankChoirMouthSoap) @Variable[Choice]>=[90] @NullResponse @Goto(Soap)
@Flag(SpankChoirFaceSlap) @Variable[Choice]>=[70] @NullResponse @Goto(Slap)
@Flag(SpankChoirCaning) @Variable[Choice]>=[40] @NullResponse @Goto(Caning)
@Variable[Choice]>=[30] @NullResponse @Goto(Corner)
@Variable[Choice]>=[5] @NullResponse @Goto(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\SpecialtyM8.txt)
@NullResponse @Goto(Return)
**********************************************************************************************************************************************************************
(Caning)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\MxCaning.txt)
@NullResponse @Goto(Return)
(Corner)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\MxCorner.txt)
@NullResponse @Goto(Return)
(Slap)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\MxSlap.txt)
@NullResponse @Goto(Return)
(Soap)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\MxSoap.txt)
@NullResponse @Goto(Return)
(Spanking)
@NullResponse @CallReturn(CR\BackgroundMode\Punishment\SpankzChoir\MxSpanking.txt)
@NullResponse @Goto(Return)
(End)
@SystemMessage #MxChat2 #SlaveName .. #MxChat
@SystemMessage #MxChat2 I enjoyed our time together #MxChat
@SystemMessage #MxChat2 Though I'm not sure your #GNMAss did #GNMLol #MxChat
@SystemMessage #MxChat2 But before I leave you #MxChat
@SystemMessage #MxChat2 How many strokes did I give you today? #GNMGrin #MxChat @InputVar[Guess]
@Variable[Guess]=[TotalSpanking] @SystemMessage #MxChat2 Correct! #GNMEmoteHappy #MxChat #MeritChangePHigh
@Variable[Guess]<>[TotalSpanking] @SystemMessage #MxChat2 Nope! the number was @ShowVar[TotalSpanking] strokes #MxChat #MeritChangeNMedium
@SystemMessage #MxChat2 I'm sure it would make your #DomHonorific happy #MxChat
@SystemMessage #MxChat2 If you took a photo of your #GNMAss and placed it in your humiliation folder #GNMGrin #MxChat @TempFlag(SpankzChoirComplete) @CallReturn(CR\BackgroundMode\Punishment\PunishmentBaseEnd.txt)
@End